<!DOCTYPE stack PUBLIC "-//Apple, Inc.//DTD stack V 2.0//EN" "" >
<stack>
<name>in.les</name>
<id>-1</id>
<cardCount>4138</cardCount>
<cardID>3717</cardID>
<listID>4206</listID>
<cantModify><false /></cantModify>
<cantDelete><false /></cantDelete>
<cantAbort><false /></cantAbort>
<cardSize>
<width>512</width>
<height>342</height>
</cardSize>
<script>on openStackhide menuBarglobal theSpeechif theSpeech is empty then TurnSpeechOnput "Cards in this stack" into LineCntput the number of cards into Countput Count && LineCnt into bkgnd field id 30put "Using" && the size of this stack && "bytes" into bkgnd field Sizeend openStackon closeStackget the freeSize of this stackif it > 1024*10 thenanswer "Stack needs to be compacted" with "Do it" or "Don't do it"if it is "Do it" thenanswer "Are you sure? This could take 10 minutes." with "I'm sure"¬or "Skip it" or "Cancel"if it is "I'm sure" thensay "O K! this will take some time, just sit back."doMenu Compact Stackend ifend ifend ifTurnSpeechOffend closeStack</script>